home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / keyb / keykill.zip / DEBOOT.BAS next >
BASIC Source File  |  1989-12-13  |  682b  |  18 lines
  1. 2 OPEN "deboot.com" FOR OUTPUT AS 1
  2. 3 FOR I = 1 TO 123 : READ BYTE
  3. 4 PRINT#1, CHR$(BYTE); : NEXT I : CLOSE 1
  4. 5 PRINT "DEBOOT.COM created.  Type SYSTEM to leave Basic."
  5. 11 DATA 235,62,144,0,0,0,0,251,80,30
  6. 12 DATA 228,96,60,83,117,40,184,64,0,142
  7. 13 DATA 216,160,23,0,138,224,36,12,60,12
  8. 14 DATA 117,9,128,228,247,136,38,23,0,235
  9. 15 DATA 15,138,196,36,10,60,10,117,7,128
  10. 16 DATA 204,4,136,38,23,0,31,88,250,46
  11. 17 DATA 255,46,3,1,184,9,53,205,33,137
  12. 18 DATA 30,3,1,140,192,163,5,1,186,7
  13. 19 DATA 1,184,9,37,205,33,180,9,186,101
  14. 20 DATA 1,205,33,186,20,0,184,0,49,205
  15. 21 DATA 33,13,10,68,69,66,79,79,84,32
  16. 22 DATA 105,110,115,116,97,108,108,101,100,46
  17. 23 DATA 13,10,36
  18.